

use "$path\datasets\rd_dataset.dta", clear

local depvar "ch_total_child_places_pc"

preserve
drop if margin_1>=0 & margin_1<0.01
rdd_plot  `depvar',  includedbw(0.15)  control(margin_1) binsize(0.01)  bw(0.10) title("Change in child care spots pc") xtitle("Female candidate margin of victory (%)")
graph export FigureA3/figureA3a.pdf, replace
restore


preserve
drop if margin_1>=-0.02 & margin_1<-0.01
rdd_plot  `depvar',  includedbw(0.15)  control(margin_1) binsize(0.01)  bw(0.10) title("Change in child care spots pc") xtitle("Female candidate margin of victory (%)")
graph export FigureA3/figureA3b.pdf, replace
restore
